-- stack: in
-- format: 10 (HyperCard 2)
-- flags: 0x5C00 (can't delete, can't abort, can't peek)
-- protect password hash: 1638073505
-- maximum user level: 2 (typing)
-- window: Rect(x1=96, y1=62, x2=544, y2=326)
-- screen: Rect(x1=0, y1=0, x2=640, y2=480)
-- card dimensions: w=448 h=264
-- scroll: x=0 y=0
-- background count: 1
-- first background id: 2669
-- card count: 1
-- first card id: 2968
-- list block id: 3942
-- print block id: 0
-- font table block id: 3523
-- style table block id: 3121
-- free block count: 0
-- free size: 0 bytes
-- total size: 8768 bytes
-- stack block size: 2560 bytes
-- created by hypercard version: 0x02208000
-- compacted by hypercard version: 0x02208000
-- modified by hypercard version: 0x02208000
-- opened by hypercard version: 0x02208000
-- patterns[0]: 0x0000000000000000
-- patterns[1]: 0x8000000008000000
-- patterns[2]: 0x8800220088002200
-- patterns[3]: 0x8888222288882222
-- patterns[4]: 0x88AA22AA88AA22AA
-- patterns[5]: 0xCCAA33AACCAA33AA
-- patterns[6]: 0xEEAABBAAEEAABBAA
-- patterns[7]: 0xEEBBBBEEEEBBBBEE
-- patterns[8]: 0xFFBBFFEEFFBBFFEE
-- patterns[9]: 0xFFBBFFFFFFBBFFFF
-- patterns[10]: 0x8010022001084004
-- patterns[11]: 0xFFFFFFFFFFFFFFFF
-- patterns[12]: 0x8822882288228822
-- patterns[13]: 0x1122448811224488
-- patterns[14]: 0xC4800C6843023026
-- patterns[15]: 0xB130031BD8C00C8D
-- patterns[16]: 0xAA00AA00AA00AA00
-- patterns[17]: 0x8822552288225522
-- patterns[18]: 0x8855225588552255
-- patterns[19]: 0x77DD77DD77DD77DD
-- patterns[20]: 0x8000000000000000
-- patterns[21]: 0xAA55AA55AA55AA55
-- patterns[22]: 0x038448300C020101
-- patterns[23]: 0x8244394482010101
-- patterns[24]: 0x8814224188412214
-- patterns[25]: 0x8080413E080814E3
-- patterns[26]: 0x22048C7422179810
-- patterns[27]: 0xBE808808EB088880
-- patterns[28]: 0x25C8328964244C92
-- patterns[29]: 0xA29C41BE2AC914EB
-- patterns[30]: 0x40A00000040A0000
-- patterns[31]: 0x8040200002040800
-- patterns[32]: 0xAA00800088008000
-- patterns[33]: 0xFF80808080808080
-- patterns[34]: 0x081C22C180010204
-- patterns[35]: 0xFF808080FF080808
-- patterns[36]: 0xF87422478F172271
-- patterns[37]: 0xBF00BFBFB0B0B0B0
-- patterns[38]: 0xFF7FBE5DA2418000
-- patterns[39]: 0xFAF5FAF5A050A050
-- checksum: 0x30BCDCE4
----- HyperTalk script -----
on openStack
  set hilite of bg btn id 43 to true
  send "mouseUp" to bg btn id 43
  click at the loc of bg fld id 38

  global mailGood
  put true into mailGood
end openStack

on closeStack
  global mailGood
  if mailGood then
    send "sendTheMail" to bg btn id 7
  end if

  put "" into bg fld "subject"
  put "" into bg fld "sendTo"
  put "" into bg fld "body"

  set cursor to watch
  set hilite of bg btn id 7 to false
end closeStack

on suspendStack
  -- close window (short name of this stack)
end suspendStack

on keyDown what
  if charToNum(what) = 3 then
    set hilite of bg btn id 7 to true
    send mouseUp to bg btn id 7
  else
    pass keyDown
  end if
end keyDown